Language/OS - Multiplatform Resource Library/LANGUAGE OS.iso/a_utils/perl/perl5a1.lha/perl5alpha1/B1

Text File | 1992-07-10 | 145b | 8 lines

$ActualRevision = "M";

($junk, $ActualRevision) = '';

chop($ActualRevision);

($name, $ActualRevision, $junk) = split(/\s+/, $ActualRevision);